Added or corrected documentation headers

diff --git a/lisp/finder.el b/lisp/finder.el
index 5be96e85b21ac5c4483a2185ed6b4c649373ccc4..ce3b858c00902009cffa921a3a9f3bc0eb28bc3c 100644 (file)
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -86,7 +86,9 @@ arguments compiles from `load-path'."
       (erase-buffer)
       (insert ";;; finder-inf.el --- keyword-to-package mapping\n")
       (insert ";; Keywords: help\n")
-      (insert ";;; Don't edit this file.  It's generated by finder.el\n\n")
+      (insert ";;; Commentary:\n")
+      (insert ";; Don't edit this file.  It's generated by finder.el\n\n")
+      (insert ";;; Code:\n")
       (insert "\n(setq finder-package-info '(\n")
       (mapcar
        (function
@@ -119,7 +121,7 @@ arguments compiles from `load-path'."
           (directory-files (or d ".")))
          ))
        (or dirs load-path))
-      (insert "))\n\n(provide 'finder-inf)\n")
+      (insert "))\n\n(provide 'finder-inf)\n\n;;; finder-inf.el ends here\n")
       (kill-buffer "*finder-scratch*")
       (eval-current-buffer) ;; So we get the new keyword list immediately
       (basic-save-buffer)